Keep Man sections in natural order (bug#28998)

* lisp/man.el (Man-build-section-alist): Reverse sections.

diff --git a/lisp/man.el b/lisp/man.el
index 7a892c6e88a1bd34e58dc94e23c12150c4990017..f7b1609c929662e15adfc8272343105ffb34414c 100644 (file)
--- a/lisp/man.el
+++ b/lisp/man.el
@@ -1522,7 +1522,8 @@ The following key bindings are currently in effect in the buffer:
       (let ((section (match-string 1)))
         (unless (member section Man--sections)
           (push section Man--sections)))
-      (forward-line 1))))
+      (forward-line 1)))
+  (setq Man--sections (nreverse Man--sections)))
 
 (defsubst Man-build-references-alist ()
   "Build the list of references (in the SEE ALSO section)."